home *** CD-ROM | disk | FTP | other *** search
/ Cream of the Crop 26 / Cream of the Crop 26.iso / os2 / pvm34b3.zip / pvm34b3 / pvm3 / examples / inherit2.c < prev    next >
C/C++ Source or Header  |  1997-07-22  |  2KB  |  70 lines
  1.  
  2. static char rcsid[] =
  3.     "$Id: inherit2.c,v 1.3 1997/07/09 13:24:48 pvmsrc Exp $";
  4.  
  5. /*
  6.  *         PVM version 3.4:  Parallel Virtual Machine System
  7.  *               University of Tennessee, Knoxville TN.
  8.  *           Oak Ridge National Laboratory, Oak Ridge TN.
  9.  *                   Emory University, Atlanta GA.
  10.  *      Authors:  J. J. Dongarra, G. E. Fagg, M. Fischer
  11.  *          G. A. Geist, J. A. Kohl, R. J. Manchek, P. Mucci,
  12.  *         P. M. Papadopoulos, S. L. Scott, and V. S. Sunderam
  13.  *                   (C) 1997 All Rights Reserved
  14.  *
  15.  *                              NOTICE
  16.  *
  17.  * Permission to use, copy, modify, and distribute this software and
  18.  * its documentation for any purpose and without fee is hereby granted
  19.  * provided that the above copyright notice appear in all copies and
  20.  * that both the copyright notice and this permission notice appear in
  21.  * supporting documentation.
  22.  *
  23.  * Neither the Institutions (Emory University, Oak Ridge National
  24.  * Laboratory, and University of Tennessee) nor the Authors make any
  25.  * representations about the suitability of this software for any
  26.  * purpose.  This software is provided ``as is'' without express or
  27.  * implied warranty.
  28.  *
  29.  * PVM version 3 was funded in part by the U.S. Department of Energy,
  30.  * the National Science Foundation and the State of Tennessee.
  31.  */
  32.  
  33. /*
  34.  *    Filename:     inherit2.c
  35.  *
  36.  *  support program for inherita.c and inheritb.c
  37.  *    - read docs in those files.
  38.  */
  39.  
  40. #ifndef WIN32
  41. #include <unistd.h>        /* for gethostname */
  42. #else
  43. #include "pvmwin.h"
  44. #endif
  45. #include "pvm3.h"
  46.  
  47. main()
  48. {
  49.     char *me = "inherit2";
  50.     int ptid;
  51.     char buf[100];
  52.     char machine[25];
  53.  
  54.     ptid = pvm_parent();
  55.  
  56.     gethostname( machine, 25 );
  57.  
  58.     sprintf( buf, "\t%s t%x on machine <%s> with context %d.",
  59.             me, pvm_mytid(), machine, pvm_getcontext() );
  60.  
  61.     /* Send message to parent */
  62.     pvm_initsend( PvmDataDefault );
  63.     pvm_pkstr( buf );
  64.     pvm_send( ptid, 1 );
  65.  
  66.     pvm_exit();
  67.     exit( 0 );
  68. }
  69.  
  70.